; Music of Pulsoid (1988) (Mastertronic) (Tiny Williams)
; Ripped by Megachur the 19/01/2007

	write "PULSOID.BIN"

music_date_rip	equ &1317
music_adr	equ &a500
first_theme	equ 1
last_theme	equ 1

	read "music_header_v1_0.asm"

;&a8ef
;db "yniT 9891 (c)"

.la506 equ $ + 6
.la504 equ $ + 4
.la503 equ $ + 3
.la502 equ $ + 2
.la501 equ $ + 1
.la500
	db #01,#00,#00,#00,#00,#00,#00
;
.play_music
;
	push af
	push bc
	push de
	push hl
	ld a,#ab
	ld (la7c6),a
	call la563
	ld a,(la502)
	or a
	jr z,la54a
	ld hl,la63a
	dec (hl)
	ld h,#a9
	call la627
	inc h
	call la627
	inc h
	call la627
	call la5d4
	call la616
	call la7a9
	ld hl,la63a
	ld a,(hl)
	or a
	jr nz,la53c
.la53b equ $ + 1
	ld (hl),#01
.la53c
	ld a,(la502)
	or a
	jr z,la54a
	call la7b9
	pop hl
	pop de
	pop bc
	pop af
	ret
.la54a
	call la5d4
	call la616
	ld a,(la503)
	or a
	jr z,la55e
	call la80f
	ld h,#ad
	call la7c7
.la55e
	pop hl
	pop de
	pop bc
	pop af
	ret
.la563
	ld a,(la502)
	or a
	jr nz,la56f
	ld a,(la500)
;
.init_music     ; a = 1
;
	ld (la9fc),a
.la56f
	ld a,(la9fc)
	or a
	ret z
	push af
	call la800
	pop af
	cp #02
	ret nc
	ld (la502),a
	dec a
	add a
	add a
	add a
	add #33
	ld e,a
	adc #ad
	sub e
	ld d,a
	ld a,(de)
	inc de
	ld (la53b),a
	ld h,#a9
	call la5ae
	call la5ae
	call la5ae
	xor a
	ld (la9fc),a
	ld (la500),a
	ld (la504),a
	inc a
	ld (la63a),a
	ld a,#10
	ld (la506),a
	ret
.la5ae
	ld l,#05
	ld (hl),#01
	dec l
	xor a
	ld (hl),a
	ld l,#07
	ld (hl),a
	ld l,#09
	ld (hl),a
	ld l,#15
	ld (hl),a
	ld a,(de)
	inc de
	ld c,a
	ld a,(de)
	inc de
	ld b,a
	ld l,#02
	ld a,(bc)
	ld (hl),a
	inc bc
	inc l
	ld a,(bc)
	ld (hl),a
	inc bc
	ld l,#00
	ld (hl),c
	inc l
	ld (hl),b
	inc h
	ret
.la5d4
	ld a,(la501)
	or a
	ret z
	cp #08
	ret nc
	ld l,a
	ld a,(la503)
	or a
	jr z,la5e7
	cp l
	jr c,la5ed
	ret
.la5e7
	ld a,(la62a)
	ld (la73e),a
.la5ed
	ld a,l
	ld (la503),a
	dec a
	add a
	add #f0
	ld l,a
	adc #ab
	sub l
	ld h,a
	ld de,lad02
	ldi
	ex de,hl
	ld a,(de)
	ld (hl),a
	ld d,a
	dec l
	ld e,(hl)
	xor a
	ld (la501),a
	ld l,#04
	ld (hl),a
	ld l,#15
	ld (hl),a
	ld l,#16
	ld (hl),#01
	jp la675
.la616
	ld a,(la503)
	or a
	ret z
	ld hl,lad02
	ld a,h
	ld (la7c6),a
	ld e,(hl)
	inc l
	ld d,(hl)
	jr la63e
.la627
	ld l,#20
.la62a equ $ + 1
	ld a,#3f
	and (hl)
	jr nz,la634
	ld l,#07
	ld a,(hl)
	ld (la81d),a
.la634
	ld l,#02
	ld e,(hl)
	inc l
	ld d,(hl)
.la63a equ $ + 1
	ld a,#00
	or a
	jr nz,la649
.la63e
	ld l,#05
	dec (hl)
	jr z,la675
	call la99d
	call labd8
.la649
	call lab69
	call lab35
	call lab2e
	call la752
	call la9a8
	call laae1
	ld l,#04
	bit 5,(hl)
	ret z
	ld a,r
	and #07
	ld c,a
	ld l,#07
	ld a,(la907)
	add c
	ld (hl),a
	ld a,(la909)
	ld l,#09
	ld (hl),a
	ret nc
	inc (hl)
	ret
.la675
	ld a,(de)
	inc de
	or a
	jp m,la6b1
.la67b
	ld l,#0c
	ld (hl),a
	ld l,#02
	ld (hl),e
	inc l
	ld (hl),d
	call la9c3
	ld l,#14
	ld a,(hl)
	ld l,#0b
	ld (hl),a
	ld l,#0d
	ld a,(hl)
	ld l,#05
	ld (hl),a
	ld l,#18
	ld (hl),#00
	ld l,#2d
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#0e
	call la6a1
	inc l
.la6a1
	ld a,(hl)
	ld c,a
	and #0f
	inc l
	ld (hl),a
	ld a,c
	rra
	rra
	rra
	rra
	and #0f
	inc l
	ld (hl),a
	ret
.la6b1
	cp #e0
	jr nc,la6d9
	cp #d0
	jr nc,la6e9
	cp #c0
	jr nc,la6e1
	cp #b0
	jr nc,la710
	ld c,h
	add a
	add #2e
	ld l,a
	adc #aa
	sub l
	ld h,a
	ld a,c
	ld c,(hl)
	inc hl
	ld b,(hl)
	ld h,a
	ld (la6d4),bc
.la6d4 equ $ + 1
	call #0000
	jp la675
.la6d9
	sub #df
	ld l,#0d
	ld (hl),a
	jp la675
.la6e1
	sub #c0
	ld l,#14
	ld (hl),a
	jp la675
.la6e9
	sub #d0
	ld l,#14
	ld (hl),a
	ex de,hl
	ld e,#0e
	ldi
	ld e,#11
	ldi
	ex de,hl
	ld a,(de)
	rra
	rra
	rra
	rra
	and #0f
	ld l,#19
	ld (hl),a
	inc l
	ld (hl),a
	ld a,(de)
	and #0f
	ld l,#1b
	ld (hl),a
	inc l
	ld (hl),a
	inc de
	jp la675
.la710
	sub #b0
	add a
	add #d1
	ld c,a
	adc #a8
	sub c
	ld b,a
	ld a,(bc)
	ld l,#21
	ld (hl),a
	inc l
	inc bc
	ld a,(bc)
	ld (hl),a
	inc l
	ld (hl),#00
	ld l,#04
	set 0,(hl)
	jp la675
.la72c
	pop af
	xor a
	ld (la503),a
	ld (lad0b),a
	ld (lab0b),a
	ld a,(la62a)
	and #db
	ld c,a
.la73e equ $ + 1
	ld a,#00
	and #24
	or c
	ld (la62a),a
	ld a,(la502)
	or a
	ret nz
	ld a,#3f
	ld (la62a),a
	jp la80f
.la753 equ $ + 1
.la752
	ld a,#55
	rrca
	ld (la753),a
	ret c
	dec de
	ld a,(de)
	inc de
	cp #8e
	jr z,la76a
	ld l,#0d
	ld a,(hl)
	ld l,#2a
	sub (hl)
	ld l,#05
	cp (hl)
	ret c
.la76a
	ld l,#04
	bit 3,(hl)
	ret z
	bit 6,(hl)
	jr z,la78d
	ld l,#2c
	dec (hl)
	jr nz,la781
	inc l
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#04
	res 6,(hl)
	ret
.la781
	ld l,#2b
	ld a,(hl)
	ld l,#07
	add (hl)
	ld (hl),a
	ret nc
	ld l,#09
	inc (hl)
	ret
.la78d
	ld l,#2c
	dec (hl)
	jr nz,la79b
	inc l
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#04
	set 6,(hl)
	ret
.la79b
	ld l,#07
	ld a,(hl)
	ld l,#2b
	sub (hl)
	ld l,#07
	ld (hl),a
	ret nc
	ld l,#09
	dec (hl)
	ret
.la7a9
	ld hl,la504
	ld a,(hl)
	or a
	ret z
	inc hl
	dec (hl)
	ret nz
	ld (hl),a
	inc hl
	dec (hl)
	ret p
	inc (hl)
	jr la800
.la7b9
	call la80f
	ld h,#a9
	call la7c7
	inc h
	call la7c7
.la7c6 equ $ + 1
	ld h,#ab
.la7c7
	ld l,#06
	call la7e3
	call la7e3
	ld a,(la506)
	add a
	ret z
	ld b,(hl)
	inc l
	add a
	add a
	add a
	add (hl)
	push hl
	ld l,a
	ld h,#ac
	ld a,b
	ld c,(hl)
	pop hl
	jr la7e7
.la7e3
	ld a,(hl)
	inc l
	ld c,(hl)
	inc l
.la7e7
	ld b,d
	out (c),a
.la7eb equ $ + 1
	ld a,#c0
	ld b,e
	out (c),a
	and #3f
	out (c),a
	ld b,d
	out (c),c
	ld b,e
	ld c,a
	or #80
	out (c),a
	out (c),c
	ret
	pop af
;
.stop_music
.la800
;
	xor a
	ld (la502),a
	ld (la503),a
	ld (la9c4),a
	ld a,#3f
	ld (la62a),a
.la80f
	ld de,#f4f6
	ld b,e
	in a,(c)
	or #c0
	ld (la7eb),a
	ld a,#06
.la81d equ $ + 1
	ld c,#01
	call la7e7
	ld a,(la62a)
	ld c,a
	ld a,#07
	jr la7e7
	dw #077c,#0710,#06ab,#064b
	dw #05f1,#059b,#054b,#04ff
	dw #04b7,#0473,#0433,#03f7
	dw #03be,#0388,#0355,#0326
	dw #02f8,#02ce,#02a5,#027f
	dw #025c,#023a,#021a,#01fb
	dw #01df,#01c4,#01ab,#0193
	dw #017c,#0167,#0153,#0140
	dw #012e,#011d,#010d,#00fe
	dw #00f0,#00e2,#00d5,#00c9
	dw #00be,#00b3,#00a9,#00a0
	dw #0097,#008e,#0086,#007f
	dw #0078,#0071,#006b,#0065
	dw #005f,#005a,#0055,#0050
	dw #004b,#0047,#0043,#003f
	dw #003c,#0039,#0035,#0032
	dw #0030,#002d,#002a,#0028
	dw #0026,#0024,#0022,#0020
	dw #001e,#001c,#001b,#0019
	dw #0018,#0016,#0015,#0014
	dw #0013,#0012,#0011,#0010
	dw la8db,la8e5,la8e9,la8eb
	dw la8ef
.la8db
	db #00,#0c,#01,#0d,#02,#0e,#01,#0d
.la8e9 equ $ + 6
.la8e5 equ $ + 2
	db #00,#8c,#00,#09,#00,#89,#00,#8c
.la8eb
	db #00,#09,#14,#97
.la8ef
	db #79,#6e,#69,#54,#20,#39,#38,#39
	db #31,#20,#28,#63,#29
	db #00,#00,#00,#00,#00,#00,#00,#00
.la909 equ $ + 5
.la907 equ $ + 3
	db #00,#00,#00,#00,#01,#00,#08,#0f
	db #00,#04,#00,#00,#00,#00,#00,#00
	db #0f,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#01,#08,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00
.la92e
	ld l,#04
	res 2,(hl)
	ret
.la933
	call la989
	ld l,#1f
.la938
	ld a,(hl)
.la939
	cpl
	and c
	ld c,a
	ld l,#04
	res 4,(hl)
	res 0,(hl)
	ld a,h
	cp #ab
	jr z,la94c
.la947
	ld a,c
	ld (la62a),a
	ret
.la94c
	ld a,(la503)
	or a
	jr z,la947
	ld a,c
	ld (la73e),a
	ret
.la957
	call la989
	ld l,#20
	jr la938
.la95e
	call la989
	ld l,#1f
	ld a,(hl)
	inc l
	or (hl)
	jr la939
.la968
	call la989
	ld l,#20
	ld a,(hl)
	cpl
	and c
	ld (la62a),a
	ld l,#04
	set 4,(hl)
	ret
.la978
	ld l,#0b
	ld (hl),#00
.la97c
	pop af
	ld l,#0d
	ld a,(hl)
	ld l,#05
	ld (hl),a
	ld l,#02
	ld (hl),e
	inc l
	ld (hl),d
	ret
.la989
	ld a,(la62a)
	ld l,#1f
	or (hl)
	inc l
	or (hl)
	ld c,a
	ret
.la993
	ld l,#15
	ld (hl),#01
	ret
.la998
	ld l,#15
	ld (hl),#ff
	ret
.la99d
	ld l,#15
	ld a,(hl)
	or a
	ret z
	ld l,#0c
	add (hl)
	ld (hl),a
	jr la9c3
.la9a8
	ld l,#04
	bit 0,(hl)
	ret z
	ld l,#21
	ld a,(hl)
	inc l
	ld b,(hl)
	inc l
	add (hl)
	ld c,a
	jr nc,la9b8
	inc b
.la9b8
	inc (hl)
	ld a,(bc)
	or a
	jp p,la9c0
	ld (hl),#00
.la9c0
	ld l,#0c
	add (hl)
.la9c4 equ $ + 1
.la9c3
	add #00
	add a
	add #29
	ld c,a
	adc #a8
	sub c
	ld b,a
	ld a,(bc)
	inc bc
	ld l,#07
	ld (hl),a
	ld a,(bc)
	ld l,#09
	ld (hl),a
	ld l,#04
	bit 2,(hl)
	ret z
	push de
	ld l,#27
	ld e,(hl)
	inc l
	ld d,(hl)
	ld l,#07
	ld c,(hl)
	ld l,#09
	ld b,(hl)
	ex de,hl
	add hl,bc
	ex de,hl
	ld (hl),d
	ld l,#07
	ld (hl),e
	pop de
	ld l,#29
	ld a,(hl)
	ld l,#26
	ld (hl),a
	ret
.la9f6
	ld a,(de)
	ld (la9c4),a
	inc de
	ret
.la9fd equ $ + 1
.la9fc
	db #00,#34,#c9,#00,#00,#00,#00,#00
	db #00,#00,#02,#00,#03,#00,#09,#0f
	db #00,#04,#00,#00,#00,#00,#00,#00
	db #0f,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#02,#10,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00
	dw laabb,la993,la998,laa74
	dw lad2e,laa8d,laa9c,la92e
	dw laa5c,laa6f,la933,la957
	dw la95e,la968,la97c,la978
	dw la9f6,la800,laaf4,laaf9
	dw laab3,la72c,labbc
.laa5c
	ex de,hl
	ld e,#2a
	ldi
	ldi
	ld a,(hl)
	ldi
	ld (de),a
	ex de,hl
	ld l,#04
	set 3,(hl)
	set 6,(hl)
	ret
.laa6f
	ld l,#04
	res 3,(hl)
	ret
.laa74
	ld a,(de)
	inc de
	ld l,#16
	ld (hl),a
	ld a,(de)
	rra
	rra
	rra
	rra
	and #0f
	ld l,#1d
	ld (hl),a
	inc l
	ld (hl),a
	ld a,(de)
	and #0f
	ld l,#17
	ld (hl),a
	inc de
	ret
.laa8d
	ex de,hl
	ld e,#24
	ldi
	ldi
	ldi
	ex de,hl
	ld l,#04
	set 1,(hl)
	ret
.laa9c
	ex de,hl
	ld e,#27
	ldi
	ldi
	ld e,#24
	ldi
	ldi
	ld e,#29
	ldi
	ex de,hl
	ld l,#04
	set 2,(hl)
	ret
.laab3
	ld l,#00
	ex de,hl
	ldi
	ldi
	ex de,hl
.laabb
	ld a,(la500)
	ld (la9fc),a
	ld l,#00
	ld c,(hl)
	inc l
	ld b,(hl)
	ld a,(bc)
	ld e,a
	inc bc
	ld a,(bc)
	inc bc
	ld d,a
	or e
	jr z,laad8
	ld (hl),b
	dec l
	ld (hl),c
	inc l
	inc l
	ld (hl),e
	inc l
	ld (hl),d
	ret
.laad8
	ld d,b
	ld e,c
	pop bc
	ld a,(lb08f)
	jp la6b1
.laae1
	ld l,#04
	bit 4,(hl)
	ret z
	ld l,#1f
	ld a,(hl)
	inc l
	or (hl)
	ld c,a
	ld a,(la62a)
	xor c
	ld (la62a),a
	ret
.laaf4
	ld l,#04
	set 5,(hl)
	ret
.laaf9
	ld l,#04
	res 5,(hl)
	ret
	db #00,#00,#00,#00,#00,#00,#00,#00
.lab0b equ $ + 5
	db #04,#00,#05,#00,#0a,#0f,#00,#04
	db #00,#00,#00,#00,#00,#00,#0f,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#04,#20,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lab2e
	ld l,#04
	bit 2,(hl)
	jr nz,lab3a
	ret
.lab35
	ld l,#04
	bit 1,(hl)
	ret z
.lab3a
	ld l,#26
	dec (hl)
	jp m,la9fd
	ld l,#25
	bit 7,(hl)
	jr nz,lab55
	ld l,#24
	ld a,(hl)
	ld l,#07
	add (hl)
	ld (hl),a
	ld l,#25
	ld a,(hl)
	ld l,#09
	adc (hl)
	ld (hl),a
	ret
.lab55
	ld l,#07
	ld a,(hl)
	ld l,#24
	sub (hl)
	ld l,#07
	ld (hl),a
	ld l,#25
	ld c,(hl)
	res 7,c
	ld l,#09
	ld a,(hl)
	sbc c
	ld (hl),a
	ret
.lab69
	ld l,#0f
	ld a,(hl)
	or a
	jr z,lab84
	ld l,#19
	dec (hl)
	ret nz
	inc l
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#0f
	dec (hl)
	inc l
	ld a,(hl)
	ld l,#0b
	add (hl)
	cp #0f
	ret nc
	ld (hl),a
	ret
.lab84
	ld l,#12
	ld a,(hl)
	or a
	jr z,laba2
	ld l,#1b
	dec (hl)
	ret nz
	inc l
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#12
	dec (hl)
	ld l,#0b
	ld a,(hl)
	ld l,#13
	sub (hl)
	jr nc,lab9e
	xor a
.lab9e
	ld l,#0b
	ld (hl),a
	ret
.laba2
	ld l,#18
	ld a,(hl)
	or a
	ret z
	ld l,#1d
	dec (hl)
	ret nz
	inc l
	ld a,(hl)
	dec l
	ld (hl),a
	ld l,#0b
	ld a,(hl)
	ld l,#17
	sub (hl)
	jr nc,labb8
	xor a
.labb8
	ld l,#0b
	ld (hl),a
	ret
.labbc
	call la957
	pop af
	ld l,#21
	ld (hl),#b0
	inc l
	ld (hl),#00
	inc l
	ld (hl),#00
	ld l,#04
	set 0,(hl)
	ld a,(la9c4)
	neg
	add #16
	jp la67b
.labd8
	ld l,#16
	ld a,(hl)
	ld l,#05
	cp (hl)
	ret nz
	ld a,(de)
	cp #8e
	ret z
	ld l,#18
	ld (hl),#01
	ld l,#15
	ld (hl),#00
	ld l,#04
	res 1,(hl)
	ret
	dw lb090,lb099,lb0a5,lb0be
	dw lb0d1,lb0e2,lb0eb
	db #00,#00,#00,#01,#02,#03,#04,#05
	db #06,#07,#08,#09,#0a,#0b,#0c,#0d
	db #0e,#0f,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#01,#01,#01,#01,#01,#01
	db #01,#01,#00,#00,#00,#00,#00,#00
	db #01,#01,#01,#01,#01,#02,#02,#02
	db #02,#02,#00,#00,#00,#00,#01,#01
	db #01,#01,#02,#02,#02,#02,#03,#03
	db #03,#03,#00,#00,#00,#00,#01,#01
	db #01,#02,#02,#02,#03,#03,#03,#04
	db #04,#04,#00,#00,#00,#01,#01,#01
	db #02,#02,#03,#03,#03,#04,#04,#04
	db #05,#05,#00,#00,#00,#01,#01,#02
	db #02,#03,#03,#03,#04,#04,#05,#05
	db #06,#06,#00,#00,#01,#01,#02,#02
	db #03,#03,#04,#04,#05,#05,#06,#06
	db #07,#07,#00,#00,#01,#01,#02,#02
	db #03,#03,#04,#05,#05,#06,#06,#07
	db #07,#08,#00,#00,#01,#01,#02,#03
	db #03,#04,#05,#05,#06,#06,#07,#08
	db #08,#09,#00,#00,#01,#02,#02,#03
	db #04,#04,#05,#06,#06,#07,#08,#08
	db #09,#0a,#00,#00,#01,#02,#03,#03
	db #04,#05,#06,#06,#07,#08,#09,#09
	db #0a,#0b,#00,#00,#01,#02,#03,#04
	db #04,#05,#06,#07,#08,#08,#09,#0a
	db #0b,#0c,#00,#00,#01,#02,#03,#04
	db #05,#06,#07,#07,#08,#09,#0a,#0b
	db #0c,#0d,#00,#00,#01,#02,#03,#04
	db #05,#06,#07,#08,#09,#0a,#0b,#0c
.lad02 equ $ + 4
	db #0d,#0e,#00,#00,#00,#00,#00,#00
.lad0b equ $ + 5
	db #04,#00,#05,#00,#0a,#0f,#00,#04
	db #00,#00,#00,#00,#00,#00,#0f,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#04,#20,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.lad2e
	ld l,#04
	res 0,(hl)
	ret
	db #04
.lad3a equ $ + 6
	dw lad3a,lad60,lad76,lad9c
	dw ladae,ladd9,ladae,ladd9
	dw ladfb,ladae,ladfb,lae26
	dw ladae,ladd9,ladae,ladd9
	dw lad9c,lae49,lad9c,lae53
.lad60 equ $ + 4
	dw #0000,lad3a,lae79,lae79
	dw laeaf,laed8,laf01,lae79
	dw laeaf,laf3d,laf3d,#0000
.lad76 equ $ + 2
	dw lad60,laf9e,lafb3,lafdc
	dw lafb3,lafdc,lafff,lafb3
	dw lafff,lb027,lb048,lb06e
	dw lb048,lb06e,laf9e,laf9e
	dw laf9e,laf9e,#0000,lad76
.lad9c
	db #d6,#17,#17,#44,#8a,#88,#08,#02
	db #01,#ff,#1f,#1f,#ef,#1d,#24,#ff
.ladae equ $ + 2
	db #1d,#80,#dc,#11,#15,#12,#8a,#88
	db #00,#01,#01,#e3,#13,#13,#e1,#96
	db #8a,#e5,#1a,#e3,#13,#13,#e1,#96
	db #8a,#18,#e3,#1a,#13,#13,#e1,#96
	db #8a,#e5,#1a,#e3,#13,#13,#e1,#96
.ladd9 equ $ + 5
	db #8a,#18,#1a,#18,#80,#e3,#11,#11
	db #e1,#96,#8a,#e5,#18,#e3,#11,#11
	db #e1,#96,#8a,#16,#e3,#18,#11,#11
	db #e1,#96,#8a,#e5,#18,#e3,#11,#11
.ladfb equ $ + 7
	db #e1,#96,#8a,#16,#18,#16,#80,#dc
	db #11,#15,#12,#8a,#88,#00,#01,#01
	db #e3,#13,#13,#e1,#96,#8a,#e5,#1a
	db #e3,#13,#13,#e1,#96,#8a,#18,#e3
	db #1a,#11,#11,#e1,#96,#8a,#e5,#18
	db #e3,#11,#11,#e1,#96,#8a,#16,#18
.lae26 equ $ + 2
	db #16,#80,#e3,#11,#11,#e1,#96,#8a
	db #e5,#18,#e3,#11,#11,#e1,#96,#8a
	db #16,#18,#16,#e3,#13,#13,#e1,#96
	db #8a,#e5,#1a,#e3,#13,#13,#e1,#96
.lae49 equ $ + 5
	db #8a,#18,#e3,#1a,#80,#d7,#17,#18
.lae53 equ $ + 7
	db #25,#ff,#1f,#1f,#1d,#24,#80,#db
	db #11,#14,#12,#e3,#1f,#1f,#1f,#1f
	db #1f,#1f,#1f,#1f,#1f,#1f,#1f,#1f
	db #1f,#1f,#1f,#1f,#1d,#1d,#1d,#1d
	db #1d,#1d,#1d,#1d,#1d,#1d,#1d,#1d
.lae79 equ $ + 5
	db #1d,#1d,#1d,#1d,#80,#da,#14,#16
	db #13,#8a,#88,#04,#01,#02,#e7,#32
	db #e3,#30,#e1,#32,#30,#32,#e3,#30
	db #2e,#e1,#2d,#e3,#2b,#e7,#32,#e3
	db #30,#e1,#32,#30,#32,#e3,#30,#2e
	db #e1,#2d,#e3,#2b,#e1,#29,#29,#29
	db #e9,#29,#e1,#29,#29,#29,#e9,#29
.laeaf equ $ + 3
	db #ff,#8f,#80,#e7,#32,#e3,#30,#e1
	db #32,#30,#32,#e3,#30,#2e,#e1,#2d
	db #e3,#2b,#e7,#32,#e3,#30,#e1,#32
	db #30,#32,#e3,#30,#2e,#e1,#2d,#e3
	db #2b,#e3,#29,#e7,#2b,#ef,#29,#e3
.laed8 equ $ + 4
	db #2b,#ff,#24,#80,#d8,#16,#16,#13
	db #88,#04,#01,#02,#e3,#32,#e7,#30
	db #e3,#2e,#32,#e7,#30,#e3,#2e,#e3
	db #30,#e7,#2e,#e3,#2d,#ef,#29,#e3
	db #2e,#e7,#2d,#e3,#2b,#2e,#e7,#2d
.laf01 equ $ + 5
	db #e3,#29,#ff,#2b,#80,#e3,#32,#e7
	db #30,#e3,#2e,#d9,#16,#16,#23,#e7
	db #37,#32,#d8,#16,#16,#13,#8a,#e1
	db #32,#30,#e7,#2e,#e3,#30,#ef,#2d
	db #dc,#11,#23,#12,#8a,#e1,#2e,#2d
	db #2b,#29,#ca,#2e,#2d,#2b,#29,#c8
	db #2e,#2d,#2b,#29,#c6,#2e,#2d,#2b
	db #29,#c4,#d7,#16,#1a,#24,#ff,#2b
.laf3d equ $ + 1
	db #80,#d8,#16,#16,#13,#8a,#ed,#37
	db #e1,#37,#e3,#3a,#39,#e7,#37,#ed
	db #37,#e1,#37,#e3,#3a,#39,#e7,#37
	db #e1,#37,#e3,#35,#37,#e1,#35,#dc
	db #12,#1a,#15,#f3,#30,#ff,#8f,#e3
	db #3a,#e7,#39,#e3,#37,#eb,#32,#e3
	db #37,#e3,#3a,#e7,#39,#e3,#37,#eb
	db #3e,#e3,#8f,#dc,#11,#23,#12,#8a
	db #e1,#30,#39,#35,#24,#cc,#30,#39
	db #35,#24,#ca,#30,#39,#35,#24,#c8
	db #30,#39,#35,#24,#c7,#30,#39,#35
	db #24,#c6,#30,#39,#35,#24,#c4,#ef
.laf9e equ $ + 2
	db #8f,#80,#da,#13,#16,#22,#8a,#ff
	db #26,#26,#e1,#26,#e3,#26,#e5,#24
.lafb3 equ $ + 7
	db #e3,#22,#ff,#21,#ef,#21,#80,#da
	db #13,#14,#12,#8a,#e1,#37,#32,#e3
	db #32,#e1,#37,#e3,#37,#32,#32,#e1
	db #37,#e3,#37,#32,#e1,#37,#e3,#37
	db #e1,#32,#e3,#3e,#e1,#37,#e3,#37
	db #e1,#3e,#37,#3e,#e3,#37,#8f,#80
.lafdc
	db #e1,#35,#30,#e3,#30,#e1,#35,#e3
	db #35,#30,#e3,#30,#e1,#35,#e3,#35
	db #30,#e1,#35,#30,#e3,#30,#e1,#35
	db #e3,#35,#30,#e3,#30,#e1,#35,#e3
.lafff equ $ + 3
	db #35,#30,#80,#d9,#13,#14,#12,#8a
	db #e1,#37,#32,#e3,#32,#e1,#37,#e3
	db #37,#32,#e3,#32,#e1,#37,#e3,#37
	db #32,#e1,#35,#30,#e3,#30,#e1,#35
	db #e3,#35,#30,#e3,#30,#e1,#35,#e3
.lb027 equ $ + 3
	db #35,#30,#80,#dc,#11,#23,#12,#8a
	db #e1,#32,#30,#2e,#2d,#ca,#32,#30
	db #2e,#2d,#c8,#32,#30,#2e,#2d,#c6
	db #32,#30,#2e,#2d,#c4,#d6,#16,#1a
.lb048 equ $ + 4
	db #24,#ff,#32,#80,#da,#12,#22,#11
	db #e1,#2b,#2b,#2b,#2b,#32,#2b,#43
	db #2b,#2b,#2b,#2b,#2b,#32,#2b,#43
	db #2b,#37,#37,#37,#37,#3e,#37,#37
	db #37,#3e,#37,#37,#37,#37,#37,#37
.lb06e equ $ + 2
	db #37,#80,#35,#35,#35,#35,#30,#35
	db #41,#35,#35,#35,#35,#35,#30,#35
	db #35,#35,#35,#35,#35,#35,#3c,#35
	db #35,#35,#3c,#35,#35,#35,#35,#35
.lb090 equ $ + 4
.lb08f equ $ + 3
	db #35,#35,#80,#94,#dc,#00,#17,#12
.lb099 equ $ + 5
	db #8a,#8d,#e3,#41,#95,#dc,#00,#17
	db #13,#88,#02,#01,#01,#e7,#8a,#39
.lb0a5 equ $ + 1
	db #95,#da,#21,#15,#13,#8a,#e3,#88
	db #01,#08,#04,#81,#2f,#c8,#81,#2f
	db #c7,#81,#2f,#c5,#81,#2f,#c4,#81
.lb0be equ $ + 2
	db #2f,#95,#8a,#d2,#25,#18,#13,#8c
	db #88,#00,#14,#02,#b0,#e3,#17,#e7
.lb0d1 equ $ + 5
	db #00,#ff,#81,#04,#95,#dc,#00,#31
	db #11,#8a,#e7,#3b,#ca,#3b,#c8,#3b
.lb0e2 equ $ + 6
	db #c6,#3b,#c5,#3b,#c3,#95,#d6,#17
.lb0eb equ $ + 7
	db #17,#13,#8a,#ef,#82,#23,#95,#d6
	db #24,#1a,#25,#8b,#e3,#b0,#17,#8c
	db #ff,#b3,#82,#00,#8e,#95,#00,#00

.game_name
	db "Pulsoid",0
.game_year
	db "1988",0
.game_publisher
	db "Mastertronic",0
.music_author
	db "Tiny Williams",0
.music_comment
	db "yniT 9891 (c)",0

	read "music_end_v1_0.asm"

